perm filename CODMAC.TEX[1,3]1 blob
sn#542085 filedate 1980-11-19 generic text, type C, neo UTF8
COMMENT ⊗ VALID 00003 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 % FONTS READ MAXTEX for documentation.
C00003 00003 % NOFILL MODE, GRFX
C00008 ENDMK
C⊗;
% FONTS READ MAXTEX for documentation.
% Font definitions:
\def\ttwr{\ninepoint\tt}
\def\grafix{\:>\baselineskip -1pt}
% NOFILL MODE, GRFX
% Typewrite or graphics mode, without justification. Example:
%
% {\grfx
% ⊂αααααααααααα⊃
% line 2 ~ a box ~
% line 3 %αααααααααααα$
% }\par
%
% Font used is GRFX35. You may also box result to indent it or place
% at your favorite spot (see DOCMAC).
% Inside this mode, TEX will only recognize \ { }. All other chars are
% taken literally (you may use \\,\{,\} in this mode).
% Similar to \grfx; but font used is "cmtt"; type {\typewrite <no fill> text}
\def\typewrite{\ttwr\def\ {\hbox to 1em{}}\nofill} % \SP
\def\typnoi{\typewrite\noindent}
% As described above:
\def\grfx{\grfxnof\noindent}
% Good to make boxes; type \hbox par 5vu{\grfxnof ...
\def\grfxnof{\grafix
\def\ {\char'40{}} % \SP
\def\\{{char'134}}
\def\{{{char'173}}
\def\}{{char'176}}
\nofill}
% Use this to allow a break in a long \nofill:
\def\nofbreak{\par\noindent}
% FOR internal use; use at own risk
% Produce "nofill" text. Note result is a paragraph. See DOCMAC
% for details.
\def\nofill{\ragged 1000000
\parskip 0pt
\lineskip 0pt
\def\ {{\ms f}} % \TAB (surprise)
\def\
{\ \par\noindent} % \CR (pend linebreak)
\chcode'1←12 % ↓
\chcode'26←12 % ⊗
\chcode'32←12 % ~
\chcode'42←12 % "
\chcode'43←12 % #
\chcode'44←12 % $
\chcode'45←12 % %
\chcode'136←12 % ↑
\chcode'11←13\chcode'15←13\chcode'40←13} % tab, cr, sp